home *** CD-ROM | disk | FTP | other *** search
/ Gold Medal Software 2 / Gold Medal Software Volume 2 (Gold Medal) (1994).iso / prog / pclcjs.arj / FILES.C < prev    next >
C/C++ Source or Header  |  1993-04-29  |  471b  |  33 lines
  1.  
  2. #include <dos.h>
  3. #include <stdio.h>
  4. #include "cjslib.h"
  5.  
  6.  
  7.  
  8. int get_files() 
  9.  
  10. {
  11.     
  12.     FPTR farptr;
  13.     
  14.     union REGS inregs,outregs;
  15.     
  16.     struct SREGS segregs;
  17.     
  18.     unsigned count=0;
  19.     
  20.     inregs.h.ah = 0x52;
  21.     
  22.     int86x(0x21,&inregs,&outregs,&segregs);
  23.     
  24.     farptr = *(FPTR far *)MK_FP(segregs.es,outregs.x.bx+4);
  25.     
  26.     do {
  27.         count += *(unsigned far *) (farptr+4);
  28.         farptr = *(FPTR far *)farptr;
  29.     }
  30.     while (0xFFFF != (unsigned)(farptr));
  31.     
  32.     return(count);
  33. }